home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / BUSITION / SMARKET2.LZH / HLRB.EXE / TPASCAL.HLB < prev   
Text File  |  1991-08-08  |  9KB  |  124 lines
  1. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  2. :  3 - String Functions             !! I/O ERROR MESSAGES                :
  3. :  4 - Notes                        !!                                   :
  4. :  5 - Standard Identifiers         !! 90 Record length mismatch         :
  5. :  6 - Standard Identifiers         !! 91 Seek beyond end of file        :
  6. :  7 - Standard Identifiers         !! 99 Unexpected end of file         :
  7. :  8 - Sample of Complex Structure  !!                                   :
  8. :  9 - Sample of Complex Structure  !! F0 Disk write error               :
  9. : 10 - Notes                        !! F1 Directory is full              :
  10. : 11 - Notes                        !! F2 File size overflow             :
  11. : 12 - Notes                        !! FF File disappeared               :
  12. : 13 - Notes                        !!                                   :
  13. : 14 - I/O Error Messages           !!                                   :
  14. : 15 - I/O Error Messages           !!                                   :
  15. : 16 - Run-Time Error Messages      !!                                15 :
  16. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  17. :                                   !!                                   :
  18. :                                   !!                                   :
  19. :                                   !!                                   :
  20. :                                   !!                                   :
  21. :                                   !!                                   :
  22. :                                   !!                                   :
  23. :                                   !!                                   :
  24. :                                   !!                                   :
  25. :                                   !!                                   :
  26. :                                   !!                                   :
  27. :                                   !!                                   :
  28. :                                   !!                                   :
  29. :                                   !!                                   :
  30. : 4                                 !!                                13 :
  31. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  32. : STANDARD IDENTIFIERS (CONT'D)     !!                                   :
  33. : GotoXY      Length     Odd        !!                                   :
  34. : HeapPtr     Ln         Ord        !!                                   :
  35. : Hi          Lo         Output     !!                                   :
  36. : IOResult    LowVideo   Pi         !!                                   :
  37. : Input       Lst        Port       !!                                   :
  38. : InsLine     LstOutPtr  Pos        !!                                   :
  39. : Insert      Mark       Pred       !!                                   :
  40. : Int         MaxInt     Ptr        !!                                   :
  41. : Integer     Mem        Random     !!                                   :
  42. : Kbd         MemAvail   Randomize  !!                                   :
  43. : KeyPressed  Move       Read       !!                                   :
  44. : Length      New        ReadLn     !!                                   :
  45. : 6           NormVideo  Real       !!                                11 :
  46. :- - - - - - - - - - - - - - - - - -  - - - - - - - - - - - - - - - - - -:
  47. :  CONST { Sample of a Complicated Structure }                           :
  48. :  Menus : ARRAY[1..2] OF                                                :
  49. :  RECORD                                                                :
  50. :     T : STRING[40]; L : ARRAY[1..2] OF                                 :
  51. :     RECORD                                                             :
  52. :       N : STRING[6]; D : STRING[40];                                   :
  53. :     END;                                                               :
  54. :   END =                                                                :
  55. :   ( (T:'Main Menu';                                                    :
  56. :      L:( {1} (N:'O'; D:'Other'  ), {2} (N:'B'; D:'Quit') ) ),          :
  57. :   (  T:'Other Menu';                                                   :
  58. :      L:( {1} (N:'Main'; D:'Main'), {2} (N:'Quit'; D:'Quit') ) ) );     :
  59. :                                                                        :
  60. : 8     WRITE(Menus[1].L[1].D);        <--- This would print "Other"   9 :
  61. :- - - - - - - - - - - - - - - - - -  - - - - - - - - - - - - - - - - - -:
  62. <<NEW PAGE>>
  63. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  64. : RUN-TIME ERROR MESSAGES           !!-----------------------------------:
  65. :                                   !!  TURBO  PASCAL  QUICK  REFERENCE  :
  66. : 01 Floating point overflow        !!-----------------------------------:
  67. : 02 Division by zero               !!                                   :
  68. : 03 SQRT argument was negative     !!  From the  Version  2.00  manual  :
  69. : 04 LN argument zero or negative   !!                                   :
  70. : 10 String >255 or >1 cvt to CHAR  !!  Turbo Pascal  is a Trademark of  :
  71. : 11 String index not in 1..255     !!       Borland International       :
  72. : 90 Index out of range             !!                                   :
  73. : 91 Scalar or sub-range out of rng !!-----------------------------------:
  74. : 92 Out of integer range           !! P I N N A C L E   S O F T W A R E :
  75. : FF Heap/Stack collision           !! P.O. Box 386, Town of Mount Royal :
  76. :                                   !! Montreal, Quebec, Canada  H3P 3C6 :
  77. : 16                                !!-----------------------------------:
  78. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  79. : I/O ERROR MESSAGES                !! STRING FUNCTIONS                  :
  80. :                                   !!                                   :
  81. : 01 File does not exist            !! DELETE(FromStr,StartPos,HowMany)  :
  82. : 02 File not open for input        !! INSERT(ThisStr,IntoStr,ThisPos)   :
  83. : 03 File not open for output       !! STR(Number,IntoStr)               :
  84. : 04 File not open                  !! VAL(FromStr,Number,RetCode)  0=OK :
  85. : 10 Error in numeric format        !! COPY(FromStr,StartPos,HowMany)    :
  86. : 20 Operation not allowed on a     !! POS(FindThisStr,InThisStr)        :
  87. :    logical device                 !!                                   :
  88. : 21 Not allowed in direct-run mode !!                                   :
  89. : 22 Assign to standard files       !!                                   :
  90. :    not allowed                    !!                                   :
  91. :                                   !!                                   :
  92. : 14                                !!                                 3 :
  93. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  94. :                                   !! STANDARD IDENTIFIERS              :
  95. :                                   !! ArcTan      ClrEOL     Delete     :
  96. :                                   !! Assign      ClrScr     EOF        :
  97. :                                   !! Aux         Con        EOLN       :
  98. :                                   !! AuxInPtr    ConInPtr   Erase      :
  99. :                                   !! AuxOutPtr   ConOutPtr  Execute    :
  100. :                                   !! BlockRead   Concat     Exp        :
  101. :                                   !! BlockWrite  ConstPtr   False      :
  102. :                                   !! Boolean     Copy       FilePos    :
  103. :                                   !! BufLen      Cos        FileSize   :
  104. :                                   !! Byte        CrtExit    FillChar   :
  105. :                                   !! Chain       CrtInit    Flush      :
  106. :                                   !! Char        DelLine    Frac       :
  107. : 12                                !! Chr         Delay      GetMem   5 :
  108. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  109. :                                   !! STANDARD IDENTIFIERS (CONT'D)     :
  110. :                                   !! Release  Swap                     :
  111. :                                   !! Rename   Text                     :
  112. :                                   !! Reset    Trm                      :
  113. :                                   !! Rewrite  True                     :
  114. :                                   !! Round    Trunc                    :
  115. :                                   !! Seek     UpCase                   :
  116. :                                   !! Sin      Usr                      :
  117. :                                   !! SizeOf   UsrInPtr                 :
  118. :                                   !! Sqr      UsrOutPtr                :
  119. :                                   !! Sqrt     Val                      :
  120. :                                   !! Str      Write                    :
  121. :                                   !! Succ     WriteLn                  :
  122. : 10                                !! Swap                            7 :
  123. :- - - - - - - - - - - - - - - - - -!!- - - - - - - - - - - - - - - - - -:
  124.